CICA 1995 September (Japanese)

home *** CD-ROM | disk | FTP | other *** search

/ CICA 1995 September (Japanese) / CICA Shareware for Windows CD-ROM (Walnut Creek) (September 1995) (Japanese) (Disc 1).iso / disc1 / misc / help30.exe / HLPNUMBR.SMM < prev next >

Wrap

INI File | 1992-06-18 | 6.6 KB | 823 lines

[ver] 4 [sty] [files] [charset] 82 ANSI (Windows, IBM CP 1252) [revisions] 0 [prn] HP LaserJet III [lang] 1 [desc] Inserts a number, a period, and a tab at the beginning of all Numbered List paragraphs. 708899863 37 698436439 29 2 0 0 0 0 0 [fopts] 0 1 0 0 [lnopts] 2 Body Text 1 [docopts] 5 2 [tag] Body Text 2 [fnt] TimesNewRomanPS 240 0 49152 [algn] 1 1 0 0 0 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Body Text 0 0 [tag] Body Single 3 [fnt] TimesNewRomanPS 240 0 49152 [algn] 1 1 0 0 0 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Body Single 0 0 [tag] Bullet 4 [fnt] TimesNewRomanPS 240 0 49152 [algn] 1 1 0 288 288 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 <*0> 360 1 1 0 0 0 0 [nfmt] 272 1 2 . , $ Bullet 0 0 [tag] Bullet 1 5 [fnt] TimesNewRomanPS 240 0 49152 [algn] 1 1 288 288 288 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 <*5> 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Bullet 1 0 0 [tag] Number List 6 [fnt] TimesNewRomanPS 240 0 49152 [algn] 1 1 360 360 360 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 <*:>. 360 1 1 0 0 0 0 [nfmt] 272 1 2 . , $ Number List 0 0 [tag] Subhead 7 [fnt] TimesNewRomanPS 240 0 49155 [algn] 1 1 0 0 0 [spc] 33 273 1 72 72 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 2 0 1 1 0 0 0 0 [nfmt] 272 1 2 . , $ Subhead 0 0 [tag] Title 8 [fnt] Arial MT 360 0 16385 [algn] 4 1 0 0 0 [spc] 33 446 1 144 72 1 100 [brk] 16 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 1 0 1 1 0 0 0 0 [nfmt] 272 1 2 . , $ Title 0 0 [lay] Standard 513 [rght] 15840 12240 1 1440 1440 1 1440 1440 0 1 0 1 0 2 1 1440 10800 12 1 720 1 1440 1 2160 1 2880 1 3600 1 4320 1 5040 1 5760 1 6480 1 7200 1 7920 1 8640 [hrght] [lyfrm] 1 11200 0 0 12240 1440 0 1 3 1 0 0 0 0 0 0 0 0 1 [frmlay] 1440 12240 1 1440 72 1 792 1440 0 1 0 1 1 0 1 1440 10800 1 3 9360 [txt] > [frght] [lyfrm] 1 13248 0 14400 12240 15840 0 1 3 1 0 0 0 0 0 0 0 0 2 [frmlay] 15840 12240 1 1440 792 1 14472 1440 0 1 0 1 1 0 1 1440 10800 2 2 4680 3 9360 [txt] > [elay] [l1] 0 [pg] 2 46 0 14 0 0 1 0 65535 65535 Standard 65535 0 0 0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 54 0 12 1025 0 0 0 65535 65535 Standard 65535 0 0 0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 [edoc] <:#278,9360>' This macro inserts a number, a period, and a tab at the beginning of all Numbered List <:#278,9360>' paragraphs. <:#278,9360> <:#278,9360>function numlist() <:#278,9360>singlestep(0) type("<[>CTRLHOME]") <:#278,9360>if Replace("", "", 6, "Numbered List", "") <<<;> 1 <:#278,9360> message("There are no Numbered List paragraphs in this document.") <:#278,9360> exit function <:#278,9360>endif <:#278,9360>type("<[>ESC]") <:#278,9360>type("<[>HOME]") <:#278,9360>if ateof()=1 <:#278,9360> type("<[>HOME]") <:#278,9360> exit function <:#278,9360>endif <:#278,9360>i = 1 <:#278,9360>again: <:#278,9360>if len(i) << 2 <:#278,9360> i = "{i}" <:#278,9360>endif <:#278,9360>if gettextbeforecursor$() <<<;> "" <:#278,9360> Type( "<[>ctrlup]") <:#278,9360>endif <:#278,9360>ck = curchar$() <:#278,9360>if isnumeric(ck) <:#278,9360> while(Instr(1, curshade$(), " ") << 1) <:#278,9360> type("<[>shiftright]") <:#278,9360> wend <:#278,9360> type("<[>del]") <:#278,9360>endif <:#278,9360>type("{i}.<[>Tab]") <:#278,9360>type("<[>CTRLDown]<[>Right]" ) <:#278,9360>if ateof()=1 <:#278,9360> type("<[>HOME]") <:#278,9360> exit function <:#278,9360>endif <:#278,9360> <:#278,9360>while (1) <:#278,9360> styname = GetStyleName$() <:#278,9360> switch styname <:#278,9360> case "Numbered List" <:#278,9360> i = i + 1 <:#278,9360> goto again <:#278,9360> case <:#278,9360> "Heading 2" <:#278,9360> i = 0 <:#278,9360> endswitch <:#278,9360> type("<[>ctrldown]") <:#278,9360> if ateof() = 1 <:#278,9360> exit function <:#278,9360> endif <:#278,9360>wend <:#278,9360>end function > [Embedded] 00005635 > [macsum] 1 numlist 0 0 4 3 [macse] 14 numlist 0 4 0 17 2 0 6 "[16420]" 17 3 2 488 1 "" "" 6 "Numbered List" "" 13 5 1 18 1 11 00000191 17 4 0 3 "There are no Numbered List paragraphs in this document." 6 0 15 9 17 7 0 6 "[27]" 17 8 0 6 "[36]" 17 9 0 278 13 5 1 18 0 11 00000299 17 10 0 6 "[36]" 6 0 15 9 17 13 29 1 i 5 1 8 1 17 15 0 14 "{1}" 13 5 2 18 5 11 00000392 17 16 7 "{1}" 8 1 17 18 0 37 13 7 "" 18 1 11 00000456 17 19 0 6 "[16422]" 17 21 29 2 ck 0 282 13 8 2 17 22 0 277 "{2}" 13 11 00000640 17 23 0 24 13 0 808 1 [X] " " 13 5 1 18 5 11 00000621 17 24 0 6 "[4135]" 10 00000525 17 26 0 6 "[46]" 17 28 0 6 "{1}.[9]" 17 29 0 6 "[16424][39]" 17 30 0 278 13 5 1 18 0 11 00000761 17 31 0 6 "[36]" 6 0 15 9 17 35 5 1 11 00001078 17 36 29 3 styname 0 288 13 8 3 17 37 7 "Numbered List" 6 3 18 0 11 00000933 17 39 6 1 5 1 3 0 8 1 17 40 10 00000324 10 00000989 7 "Heading 2" 6 3 18 0 11 00000989 17 43 5 0 8 1 17 45 0 6 "[16424]" 17 46 0 278 13 5 1 18 0 11 00001065 6 0 15 9 10 00000761 6 0 15 17 50 9 00005660